home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / scrnmasm.arc / SKIPLINE.MAC < prev    next >
Encoding:
Text File  |  1988-11-20  |  568 b   |  20 lines
  1. ;;
  2. ;; This macro will call a routine to skip "x" number of lines
  3. ;;
  4. SkipLines Macro Number
  5.          IFB <number>
  6.          IF1
  7.          %Out Missing parameter in SKIPLINES macro
  8.          .Err
  9.          Exitm
  10.          EndIf
  11.          EndIf
  12.          IFNDEF NextLine
  13.          Extrn NextLine:Near
  14.          EndIf
  15.          Push  AX                      ; Save register
  16.          Mov   AL,Number               ; The number of lines to skip
  17.          Call  NextLine                ; Do it
  18.          Pop   AX                      ; Restore register
  19.          Endm
  20.